home *** CD-ROM | disk | FTP | other *** search
- object TabForm: TTabForm
- Left = 240
- Top = 136
- Width = 550
- Height = 493
- Color = clBtnFace
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Pitch = fpVariable
- Font.Style = []
- OldCreateOrder = False
- Position = poDefault
- Visible = True
- OnCloseQuery = FormCloseQuery
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object SessionInfoPanel: TRzPanel
- Left = 0
- Top = 0
- Width = 542
- Height = 26
- Align = alTop
- Alignment = taLeftJustify
- BorderOuter = fsGroove
- TabOrder = 0
- Visible = False
- end
- object RzStatusBar1: TRzStatusBar
- Left = 0
- Top = 444
- Width = 542
- Height = 20
- AutoStyle = False
- ShowSizeGrip = False
- BorderInner = fsNone
- BorderOuter = fsNone
- BorderSides = [sdLeft, sdTop, sdRight, sdBottom]
- BorderWidth = 0
- TabOrder = 1
- object ScriptTimePanel: TRzStatusPane
- Left = 442
- Top = 0
- Align = alRight
- end
- object ScriptRecordsAffectedPanel: TRzStatusPane
- Left = 342
- Top = 0
- Align = alRight
- OnClick = ScriptRecordsAffectedPanelClick
- DefaultWidth = 100
- end
- object ScriptMessagePanel: TRzStatusPane
- Left = 0
- Top = 0
- Width = 342
- Align = alClient
- end
- object RunningStatus: TRzGlyphStatus
- Left = -1
- Top = 1
- Width = 25
- Align = alLeft
- Visible = False
- OnClick = RunningStatusClick
- Glyph.Data = {
- F6000000424DF600000000000000760000002800000010000000100000000100
- 0400000000008000000000000000000000001000000000000000000000000000
- 80000080000000808000800000008000800080800000C0C0C000808080000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 3333333333333333333333333333333333333300073333333333330BB0873333
- 33333330BB008733333333330BBB00833333333330BBB00833333333300BBB00
- 7333333300BBB00733333333300BBB007333333333300BB0073333333333300B
- 0033333333333330007333333333333333333333333333333333}
- end
- end
- object TabSplitter: TRzSplitter
- Left = 0
- Top = 26
- Width = 542
- Height = 418
- Orientation = orVertical
- Position = 124
- Percent = 30
- UsePercent = True
- SplitterStyle = ssGroove
- SplitterWidth = 6
- UseGradients = True
- Align = alClient
- TabOrder = 2
- BarSize = (
- 0
- 124
- 542
- 130)
- UpperLeftControls = (
- PlusGutter1
- ScriptText)
- LowerRightControls = (
- RzPanel1)
- object PlusGutter1: TPlusGutter
- Left = 0
- Top = 0
- Width = 30
- Height = 124
- Alignment = taRightJustify
- IgnoreLastLineIfEmpty = False
- PlusMemo = ScriptText
- Align = alLeft
- OnClick = PlusGutter1Click
- end
- object ScriptText: TPlusMemo
- Left = 30
- Top = 0
- Width = 512
- Height = 124
- Cursor = crIBeam
- Alignment = taLeftJustify
- BorderStyle = bsNone
- HideSelection = False
- ScrollBars = ssBoth
- WordWrap = False
- OnChange = ScriptTextChange
- AltFont.Charset = DEFAULT_CHARSET
- AltFont.Color = clWindowText
- AltFont.Height = -11
- AltFont.Name = 'MS Sans Serif'
- AltFont.Style = []
- ApplyKeyWords = False
- ApplyStartStopKeys = False
- BackgroundBmp.Data = {07544269746D617000000000}
- CaretWidth = 2
- ColumnWrap = 0
- DisplayOnly = False
- EnableHotKeys = False
- EndOfTextMark.Color = clRed
- EndOfTextMark.Style = psClear
- Justified = False
- LeftMargin = 6
- LineHeight = 0
- Options = [pmoKeepColumnPos, pmoPutExtraSpaces, pmoWrapCaret, pmoInsertKeyActive, pmoWideOverwriteCaret, pmoAutoScrollBars, pmoAutoIndent, pmoBackIndent, pmoWindowsSelColors, pmoNoFineScroll, pmoNoDefaultPopup, pmoPlainClipboard]
- Overwrite = False
- RightLinePen.Color = clGray
- RightLinePen.Style = psDot
- RightMargin = 6
- ScrollTime = 0
- SelBackColor = clHighlight
- SelTextColor = clHighlightText
- Separators = #10#13' ,.:;'
- ShowEndParSelected = False
- SpecUnderline.Color = clRed
- TabStops = 4
- Version = 'v6.2d Professional ed.'
- Align = alClient
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Pitch = fpVariable
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- TabStop = True
- OnKeyDown = ScriptTextKeyDown
- OnKeyPress = ScriptTextKeyPress
- OnMouseUp = ScriptTextMouseUp
- end
- object RzPanel1: TRzPanel
- Left = 0
- Top = 0
- Width = 542
- Height = 288
- Align = alClient
- BorderOuter = fsNone
- TabOrder = 0
- object ResultsNotebook: TNotebook
- Left = 0
- Top = 0
- Width = 542
- Height = 288
- Align = alClient
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Pitch = fpVariable
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- object TPage
- Left = 0
- Top = 0
- Caption = 'ShowPage'
- object EditModeToolbar: TToolBar
- Left = 0
- Top = 0
- Width = 542
- Height = 28
- AutoSize = True
- BorderWidth = 1
- Caption = 'EditModeToolbar'
- EdgeBorders = [ebLeft, ebTop, ebRight, ebBottom]
- EdgeInner = esNone
- EdgeOuter = esRaised
- Flat = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Pitch = fpVariable
- Font.Style = []
- Images = MainForm.EditButtonsImageList
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- Visible = False
- object FirstRecordButton: TToolButton
- Left = 0
- Top = 0
- Hint = 'First Record'
- Caption = 'FirstRecordButton'
- ImageIndex = 0
- OnClick = FirstRecordClick
- end
- object PreviousRecordButton: TToolButton
- Left = 23
- Top = 0
- Hint = 'Previous Record'
- Caption = 'PreviousRecordButton'
- ImageIndex = 1
- OnClick = PreviousRecordClick
- end
- object NextRecordButton: TToolButton
- Left = 46
- Top = 0
- Hint = 'Next Record'
- Caption = 'NextRecordButton'
- ImageIndex = 2
- OnClick = NextRecordClick
- end
- object LastRecordButton: TToolButton
- Left = 69
- Top = 0
- Hint = 'Last Record'
- Caption = 'LastRecordButton'
- ImageIndex = 3
- OnClick = LastRecordClick
- end
- object ToolButton5: TToolButton
- Left = 92
- Top = 0
- Width = 8
- Caption = 'ToolButton5'
- ImageIndex = 4
- Style = tbsSeparator
- end
- object InsertRecordButton: TToolButton
- Left = 100
- Top = 0
- Hint = 'Insert New Record'
- Caption = 'InsertRecordButton'
- ImageIndex = 4
- OnClick = InsertRecordClick
- end
- object DeleteRecordButton: TToolButton
- Left = 123
- Top = 0
- Hint = 'Delete Current Record'
- Caption = 'DeleteRecordButton'
- ImageIndex = 5
- OnClick = DeleteRecordClick
- end
- object ToolButton8: TToolButton
- Left = 146
- Top = 0
- Width = 8
- Caption = 'ToolButton8'
- ImageIndex = 6
- Style = tbsSeparator
- end
- object AcceptRecordButton: TToolButton
- Left = 154
- Top = 0
- Hint = 'Accept Current Record'
- Caption = 'AcceptRecordButton'
- ImageIndex = 6
- OnClick = AcceptRecordClick
- end
- object CancelEditButton: TToolButton
- Left = 177
- Top = 0
- Hint = 'Cancel Current Edit'
- Caption = 'CancelEditButton'
- ImageIndex = 7
- OnClick = CancelRecordEditingClick
- end
- object ToolButton11: TToolButton
- Left = 200
- Top = 0
- Width = 8
- Caption = 'ToolButton11'
- ImageIndex = 8
- Style = tbsSeparator
- end
- object FinishEditingButton: TToolButton
- Left = 208
- Top = 0
- Hint = 'Stop Editing'
- Caption = 'FinishEditingButton'
- ImageIndex = 8
- OnClick = FinishEditingClick
- end
- object ToolButton1: TToolButton
- Left = 231
- Top = 0
- Width = 8
- Caption = 'ToolButton1'
- ImageIndex = 9
- Style = tbsSeparator
- end
- object EditableTableLabel: TRzLabel
- Left = 239
- Top = 0
- Width = 30
- Height = 22
- Caption = ' '
- Layout = tlCenter
- end
- end
- object tsGrid1: TtsGrid
- Left = 0
- Top = 28
- Width = 542
- Height = 260
- Align = alClient
- AlwaysShowEditor = False
- BorderStyle = bsNone
- CheckBoxStyle = stCheck
- ColMoving = False
- Cols = 2
- DefaultRowHeight = 20
- ExportDelimiter = ','
- FixedColCount = 1
- FixedLineColor = clNone
- FocusColor = clHighlight
- FocusFontColor = clHighlightText
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Pitch = fpVariable
- Font.Style = []
- GridMode = gmBrowse
- HeadingFont.Charset = ANSI_CHARSET
- HeadingFont.Color = clWindowText
- HeadingFont.Height = -11
- HeadingFont.Name = 'MS Sans Serif'
- HeadingFont.Pitch = fpVariable
- HeadingFont.Style = []
- HeadingHeight = 20
- HeadingParentFont = False
- HeadingVertAlignment = vtaCenter
- HeadingWordWrap = wwOff
- ParentFont = False
- ParentShowHint = False
- ResizeRows = rrNone
- RowBarAlignment = vtaCenter
- RowChangedIndicator = riAutoReset
- RowMoving = False
- Rows = 2
- SelectionType = sltColor
- SelectFixed = False
- ShowHint = True
- TabOrder = 1
- ThumbTracking = True
- Version = '2.20.24'
- VertAlignment = vtaCenter
- WordWrap = wwOff
- XMLExport.Version = '1.0'
- XMLExport.DataPacketVersion = '2.0'
- OnCellChanged = tsGrid1CellChanged
- OnCellEdit = tsGrid1CellEdit
- OnCellLoaded = tsGrid1CellLoaded
- OnContextPopup = tsGrid1ContextPopup
- OnDblClickCell = tsGrid1DblClickCell
- OnEndRowEdit = tsGrid1EndRowEdit
- OnKeyDown = tsGrid1KeyDown
- OnMouseDown = tsGrid1MouseDown
- OnMouseUp = tsGrid1MouseUp
- OnShowEditor = tsGrid1ShowEditor
- OnStartRowEdit = tsGrid1StartRowEdit
- ColProperties = <
- item
- DataCol = 1
- Col.HeadingButton = cbNone
- Col.HeadingHorzAlignment = htaRight
- Col.Is3D = True
- Col.ReadOnly = True
- Col.HorzAlignment = htaRight
- end>
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'TextPage'
- object TextPageMemo: TPlusMemo
- Left = 0
- Top = 20
- Width = 496
- Height = 288
- Cursor = crIBeam
- Alignment = taLeftJustify
- BorderStyle = bsNone
- ScrollBars = ssBoth
- WordWrap = False
- AltFont.Charset = DEFAULT_CHARSET
- AltFont.Color = clWindowText
- AltFont.Height = -11
- AltFont.Name = 'MS Sans Serif'
- AltFont.Style = []
- ApplyKeyWords = False
- ApplyStartStopKeys = False
- CaretWidth = 2
- ColumnWrap = 0
- DisplayOnly = False
- EnableHotKeys = False
- EndOfTextMark.Color = clRed
- EndOfTextMark.Style = psClear
- Justified = False
- LineHeight = 0
- Options = [pmoWrapCaret, pmoInsertKeyActive, pmoWideOverwriteCaret, pmoAutoScrollBars, pmoNoDragnDrop, pmoWindowsSelColors, pmoNoLineSelection]
- Overwrite = False
- RightLinePen.Color = clGray
- RightLinePen.Style = psDot
- ScrollTime = 0
- SelBackColor = clHighlight
- SelTextColor = clHighlightText
- Separators = #10#13' ,.:;'
- ShowEndParSelected = False
- SpecUnderline.Color = clRed
- UpdateMode = umImmediate
- Version = 'v6.2d Professional ed.'
- Align = alClient
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = 'Courier New'
- Font.Pitch = fpVariable
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- TabStop = True
- end
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 496
- Height = 20
- Align = alTop
- Alignment = taLeftJustify
- Caption = ' Text Panel'
- TabOrder = 1
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'LogPage'
- object LogMemo: TPlusMemo
- Left = 0
- Top = 20
- Width = 496
- Height = 288
- Cursor = crIBeam
- Alignment = taLeftJustify
- BorderStyle = bsNone
- ScrollBars = ssBoth
- WordWrap = False
- AltFont.Charset = DEFAULT_CHARSET
- AltFont.Color = clWindowText
- AltFont.Height = -11
- AltFont.Name = 'MS Sans Serif'
- AltFont.Style = []
- ApplyKeyWords = False
- ApplyStartStopKeys = False
- CaretWidth = 2
- ColumnWrap = 0
- DisplayOnly = False
- EnableHotKeys = False
- EndOfTextMark.Color = clRed
- EndOfTextMark.Style = psClear
- Justified = False
- LineHeight = 0
- Options = [pmoWrapCaret, pmoInsertKeyActive, pmoWideOverwriteCaret, pmoAutoScrollBars, pmoNoDragnDrop, pmoWindowsSelColors, pmoNoLineSelection]
- Overwrite = False
- RightLinePen.Color = clGray
- RightLinePen.Style = psDot
- ScrollTime = 0
- SelBackColor = clHighlight
- SelTextColor = clHighlightText
- Separators = #10#13' ,.:;'
- ShowEndParSelected = False
- SpecUnderline.Color = clRed
- UpdateMode = umImmediate
- Version = 'v6.2d Professional ed.'
- Align = alClient
- Font.Charset = ANSI_CHARSET
- Font.Color = clWindowText
- Font.Height = -12
- Font.Name = 'Courier New'
- Font.Pitch = fpVariable
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- TabStop = True
- end
- object Panel2: TPanel
- Left = 0
- Top = 0
- Width = 496
- Height = 20
- Align = alTop
- Alignment = taLeftJustify
- Caption = ' Log Panel'
- TabOrder = 1
- end
- end
- end
- end
- end
- object SaveExportFileDialog: TSaveDialog
- Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
- Left = 40
- Top = 35
- end
- end
-